home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / mac / files / ID99MENU.DIR / 00014_body text script.ls < prev    next >
Encoding:
Text File  |  1999-04-29  |  401 b   |  22 lines
  1. property s
  2.  
  3. on beginSprite me
  4.   s = me.spriteNum
  5. end
  6.  
  7. on switchtext me, thetitle
  8.   set the member of sprite s to "cdromtext" && string(thetitle)
  9.   textcolor = 59
  10.   if thetitle < 29 then
  11.     textcolor = 43
  12.   end if
  13.   if thetitle < 4 then
  14.     textcolor = 11
  15.   end if
  16.   set the backColor of sprite s to textcolor
  17. end
  18.  
  19. on growup me, themerit
  20.   set the member of sprite s to themerit && "default text"
  21. end
  22.